home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / H-I / HyperHackers.cpt / Hyper-Hackers Queue 1.0 / card_36874.txt < prev    next >
Text File  |  1989-02-26  |  4KB  |  112 lines
  1. -- card: 36874 from stack: in.0
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3797
  5. -- name: 
  6.  
  7.  
  8. -- part contents for background part 1
  9. ----- text -----
  10.  
  11. From: edmoy@violet.berkeley.edu
  12.  
  13. Date: 10 Mar 88 19:28:34 GMT
  14.  
  15. >I want to copy the contents in fields of one stack to an updated version
  16. >new stack. I used a script like the one here...
  17.  
  18. >on copyStuff - executed from a button in the source stack
  19. >  put the number of cards into numCards
  20. >  repeat with i = 1 to numCards
  21. >    go card i of stack "sourceStack"
  22. >    put field "f1" into f1contents
  23. >    - and so on
  24. >  
  25. >  go stack "destination" - has one card to begin with, with fields, etc
  26. >  if i > the number of cards then
  27. >    doMenu "New Card"
  28. >  end if
  29. > 
  30. >  go card i
  31. >
  32. >  put f1contents into field "f1" - fields have same names
  33. >  - and so on
  34. >
  35. > end repeat
  36. >end copyStuff
  37.  
  38. I think the problem is that when you do go stack "destination" and make the
  39. new card, the card goes after the current card (the current card being the
  40. first card when just entering the stack).  Then you go to the i'th card,
  41. but that isn't the one you just created.
  42.  
  43. One way to fix the problem is to:
  44.  
  45.    go last card of stack "destination"
  46.    if i > the number of cards then
  47.       doMenu "New Card"
  48.    end if
  49.    put f1contents into field "f1"
  50.  
  51. I have a stack that is used by a group of consultants here at the computer
  52. center.  I've had to update the stack ump-teen times so I had a similar
  53. problem to yours.  I didn't want to have to go between stacks on each
  54. card, because of the additional overhead of opening and closing stacks.
  55. What I did was to write a text file having the information of the source
  56. stack, then go to the destination stack and read the stuff back in.  The
  57. code looked something like:
  58.  
  59. - This is all from memory so if the syntax is a little off, forgive me
  60.  
  61. on dump
  62.     open file "Temp File"
  63.     put tab into fieldSeparator
  64.     put return into cardSeparator
  65.     go first card
  66.     repeat with i = 1 to the number of cards
  67.       get field "f1" && fieldSeparator && field "f2" && cardSeparator
  68.       write it to file "Temp File"
  69.       go next card
  70.     end repeat
  71.     close file "Temp File"
  72. end dump
  73.  
  74. on restore
  75.     open file "Temp File"
  76.     put tab into fieldSeparator
  77.     put return into cardSeparator
  78.     read file "Temp File" until cardSeparator
  79.     repeat until it is empty
  80.       doMenu "New Card"
  81.       put offset(fieldSeparator,it) into endOfRecord
  82.       if endOfRecord > 1
  83.       then put char 1 to (endOfRecord - 1) of it into field "f1"
  84.       delete char 1 to endOfRecord of it
  85.       put offset(fieldSeparator,it) into endOfRecord
  86.       if endOfRecord > 1
  87.       then put char 1 to (endOfRecord - 1) of it into field "f2"
  88.       read file "Temp File" until cardSeparator
  89.     end repeat
  90.     close file "Temp File"
  91. end restore
  92.  
  93. I would do "dump" in the source stack and then go to the destination stack
  94. and do "restore".  In my stack, I had some 20 fields and it took about
  95. 6-8 seconds to write out each card and about 1-2 seconds to read it back
  96. in.
  97.  
  98. I eventually wanted the intermediate output to be a way to transfer data
  99. to Unix systems, where I have a simple program that can create and edit
  100. the data which could be read into the stack.  This made it considerable
  101. more complicated and (for some reason) writing it out took 2-4 seconds
  102. and reading it back in took 6-10 seconds (it has to recognize various
  103. key words, since the fields could come in any order).  This was much
  104. too slow for what I had to do.  I finally wrote an XFCN that did the
  105. same thing in C, and now it takes a second or less to write out a card,
  106. and a second or two to read it back in.
  107.  
  108.  
  109.  
  110. -- part contents for background part 45
  111. ----- text -----
  112. Re: Copying contents of stacks